 @include "lib.awk"
 @include "percentile.awk"
 BEGIN { OFS=FS="," }
       { gsub(/[ \t]*/,"")
         Key=$2
		 for(I=3;I<NF;I++) Key= Key OFS $I
		 Results[$1][Key]=$NF
		 Results[_][Key]=$NF
        }
 END   {for(Data in Results)
              for(Key in Results[Data]) {
					asort(Results[Data][Key],All)
                    quartiles(All)
       }}

